home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Rinaldi / HC 2.0 Only / Listoid 2.8.cpt / Listoid 2.8 (US) / cards.xml < prev    next >
Text File  |  1992-05-30  |  21KB  |  123 lines

  1. card_3055.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>3055</id>
  6.     <filler1>0</filler1>
  7.     <bitmap>BMAP_3273.pbm</bitmap>
  8.     <cantDelete> <false /> </cantDelete>
  9.     <showPict> <true /> </showPict>
  10.     <dontSearch> <false /> </dontSearch>
  11.     <owner>2661</owner>
  12.     <link rel="stylesheet" type="text/css" href="stylesheet_2387.css" />
  13.     <part>
  14.         <id>1</id>
  15.         <type>field</type>
  16.         <visible> <true /> </visible>
  17.         <dontWrap> <false /> </dontWrap>
  18.         <dontSearch> <false /> </dontSearch>
  19.         <sharedText> <false /> </sharedText>
  20.         <fixedLineHeight> <true /> </fixedLineHeight>
  21.         <autoTab> <false /> </autoTab>
  22.         <lockText> <true /> </lockText>
  23.         <rect>
  24.             <left>69</left>
  25.             <top>68</top>
  26.             <right>434</right>
  27.             <bottom>252</bottom>
  28.         </rect>
  29.         <style>scrolling</style>
  30.         <autoSelect> <false /> </autoSelect>
  31.         <showLines> <false /> </showLines>
  32.         <wideMargins> <false /> </wideMargins>
  33.         <multipleLines> <false /> </multipleLines>
  34.         <reservedFamily> 0 </reservedFamily>
  35.         <titleWidth>0</titleWidth>
  36.         <icon>0</icon>
  37.         <textAlign>left</textAlign>
  38.         <font>Geneva</font>
  39.         <textSize>9</textSize>
  40.         <textStyle>plain</textStyle>
  41.         <textHeight>12</textHeight>
  42.         <name></name>
  43.         <script></script>
  44.     </part>
  45.     <part>
  46.         <id>5</id>
  47.         <type>button</type>
  48.         <visible> <true /> </visible>
  49.         <reserved5> 0 </reserved5>
  50.         <reserved4> 0 </reserved4>
  51.         <reserved3> 0 </reserved3>
  52.         <reserved2> 0 </reserved2>
  53.         <reserved1> 0 </reserved1>
  54.         <enabled> <true /> </enabled>
  55.         <rect>
  56.             <left>174</left>
  57.             <top>281</top>
  58.             <right>343</right>
  59.             <bottom>311</bottom>
  60.         </rect>
  61.         <style>roundrect</style>
  62.         <showName> <true /> </showName>
  63.         <highlight> <false /> </highlight>
  64.         <autoHighlight> <true /> </autoHighlight>
  65.         <sharedHighlight> <true /> </sharedHighlight>
  66.         <family>0</family>
  67.         <titleWidth>0</titleWidth>
  68.         <icon>0</icon>
  69.         <textAlign>center</textAlign>
  70.         <font>Chicago</font>
  71.         <textSize>12</textSize>
  72.         <textStyle>plain</textStyle>
  73.         <name>Listoid</name>
  74.         <script>on mouseUpif there is not a window "TheList"thenset cursor to watchListoid "TheList",cd fld "List","dis","Select it :","red,yellow"put the resultend ifend mouseUp</script>
  75.     </part>
  76.     <part>
  77.         <id>16</id>
  78.         <type>field</type>
  79.         <visible> <true /> </visible>
  80.         <dontWrap> <false /> </dontWrap>
  81.         <dontSearch> <false /> </dontSearch>
  82.         <sharedText> <false /> </sharedText>
  83.         <fixedLineHeight> <true /> </fixedLineHeight>
  84.         <autoTab> <false /> </autoTab>
  85.         <lockText> <true /> </lockText>
  86.         <rect>
  87.             <left>417</left>
  88.             <top>256</top>
  89.             <right>512</right>
  90.             <bottom>342</bottom>
  91.         </rect>
  92.         <style>scrolling</style>
  93.         <autoSelect> <false /> </autoSelect>
  94.         <showLines> <false /> </showLines>
  95.         <wideMargins> <false /> </wideMargins>
  96.         <multipleLines> <false /> </multipleLines>
  97.         <reservedFamily> 0 </reservedFamily>
  98.         <titleWidth>0</titleWidth>
  99.         <icon>0</icon>
  100.         <textAlign>left</textAlign>
  101.         <font>Geneva</font>
  102.         <textSize>9</textSize>
  103.         <textStyle>plain</textStyle>
  104.         <textHeight>12</textHeight>
  105.         <name>List</name>
  106.         <script></script>
  107.     </part>
  108.     <content>
  109.         <layer>card</layer>
  110.         <id>1</id>
  111.         <text><span class="style1">                                               </span><span class="style2">Listoid 2.8</span><span class="style1">                                          </span><span class="style3">by Fr√©d√©ric RINALDI  and the faithfull help of Beno√Æt WIDEMANN for WDEF and CDEF resources</span><span class="style1"></span><span class="style4">DESCRIPTION</span><span class="style1">  Listoid XCMD displays a list in a windoid.</span><span class="style4">SYNTAX</span><span class="style1">    Listoid  <WName>[,<List>[,<WStyle>][,<X,Y[,Z,T]>][,<NO|ONE|CON|DIS>]              [,<selected line(s)>][<fontName[,size]>][<separator>][<prompt>]              [,<alignment>][,"DontAllowReorg"]]</span><span class="style4">PARAMETERS</span><span class="style1">   Only first param is needed. Order of params 3 to 12 doesn't matter, since the XCMD is able to recognize them.   </span><span class="style2">WName</span><span class="style1"> is a string giving the windoid name. Many windoids can be opened by using different names.   </span><span class="style2">List</span><span class="style1"> is a return or comma delimited string that will be displayed. Listoid provides an automatic separator recognition.   </span><span class="style2">WStyle</span><span class="style1"> is a string defining the window style. Allowed styles are : plain, zoom, roundRect, rect, shadow, windoid, windoidZoom, bigWindoid, bigWindoidZoom, Rinaldoid, RinaldoidZoom (Rinaldoid is the same as windoid, except that it displays the window title). All window styles are floating, except plain, zoom and roundRect. A windoid or Rinaldoid style window will have small scrollbars, while other styles will use standard size. Default is RinaldoidZoom if Rinaldoid WDEF resource is present, windoidZoom if not found.   </span><span class="style2">X,Y[,Z,T]</span><span class="style1"> will be a point or a rect, and will define position and/or size of the windoid. Coordinated are card-relative. If omitted, windoid will appear with standard size at "0,10".   </span><span class="style2">NO|ONE|CON|DIS</span><span class="style1"> defines the selection mode (no selection, one at a time, may but adjacent, many disjoint). Default is ONE.   </span><span class="style2">selected line(s)</span><span class="style1"> is an integer or a comma separated list of integers. It defines the selected line(s) when the windoid appears. Default is 1, but 0 can be used to have no selection at start.   </span><span class="style2">fontName[,size]</span><span class="style1"> is the name of font and its size to use. Default is Geneva 10.   </span><span class="style2">separator</span><span class="style1"> is a single char allowing to specify a non-standard (‚↠comma or return) delimiter char.   </span><span class="style2">prompt</span><span class="style1"> is a message string which will appear in the windoid right over the list. If omitted, the list will fill the whole windoid.   </span><span class="style2">alignment</span><span class="style1"> defines the text alignment in the list. It can be "left", "right" or "center". Default is left.   </span><span class="style2">Color</span><span class="style1"> is a one or two items string giving the foreground and background color. For each item, allowed values are the standard colors (black, white, blue, red, yellow, cyan, magenta, green), or a three word string corresponding to red, green and blue values (100 5624 28652). Default is "black,white".   </span><span class="style2">DontAllowReorg</span><span class="style1"> allows to deactivate the list reorganizing feature whith Option key held down (default is activated).   Using "!", "?" and "=" as first parameter will return an online help (resp. copyright, syntax and output).</span><span class="style4">USING</span><span class="style1">   Listoid is stand alone, no linked resource is needed. Meanwhile, this stack contains a WDEF and a CDEF resource that are recognized by the XCMD if present. The WDEF allows to have an enhanced windoid-type window displaying title, while the CDEF is useful to get nice-looking scroll arrows for small scroll bars. So, these resources are optional, and for aesthetic purpose only. If you copy them, their ID can be set to any value but don't change their name.</span><span class="style2">HINT</span><span class="style1"> :   If you use a rect ot shadow style window, placing it on a card can simulate a smart HyperCard list field.   If no rectangle param is used, the size of the window will be set accordingly to the longest string contained in the list.</span><span class="style2">HINT</span><span class="style1"> :   the card script contains a "on keyDown" handler that allows selection of first matching item when typing a key in conjunction with option key. Moreover, while holding the option key down, the arrow keys allow to move in the list, return or enter to simulate a double-clic.   It is now possible to send any string to search for to the window using :</span><span class="style5">           send "string" to window <WName></span><span class="style1">   If the string is found, it will be highlighted int the list. Look for "on keyDown" handler in the card script, type option+Key to try it.</span><span class="style2">OTHER HINT</span><span class="style1"> :   Holding the optionKey when clicking on selected item(s) will allow list reorganization. Just drag the outlined cells over the list, and all of them will be moved right where the black line appears. Releasing the optionKey at any moment cancels the current move.</span><span class="style4">MESSAGES</span><span class="style1"></span><span class="style2">NOTE</span><span class="style1"> :   in order to avoid HyperCard's confusion, existing quotes (") in WName param are automatically changed to single quote (').  </span><span class="style2">listoidSelect</span><span class="style1"> : sent when Double-clicking on item(s) in the list, followed by the clicked word(s) and the Listoid name and ID (the latter only with HC 2.1). This message can be trapped using a handler :</span><span class="style5">     on ListoidSelect What,WName,WID       if  WName is "MyList" and What is ...     end ListoidSelect</span><span class="style1">  </span><span class="style2">openListoid</span><span class="style1"> : sent when a windoid is opened, followed by the windoid name and ID (the latter only with HC 2.1). This allows to define window properties before it is shown, since the message can be trapped using a handler :</span><span class="style5">     on openListoid WName,WID       if WName is "MyWindow" then...     end openListoid</span><span class="style1">  </span><span class="style2">closeListoid</span><span class="style1"> : sent when a windoid is closed, followed by the windoid name and ID (the latter only with HC 2.1). This message can be trapped using a handler :</span><span class="style5">     on closeListoid WName,WID       if WName is "MyWindow" then...     end closeListoid</span><span class="style1">  </span><span class="style2">clickInListoid</span><span class="style1"> : sent when clicking and releaseing button in the windoid (mouseUp), followed by the Listoid name and ID (the latter only with HC 2.1). This message can be trapped using a handler :</span><span class="style5">     on clickInListoid WName,WID       if WName is "MyList"...     end clickInListoid</span><span class="style1">  </span><span class="style2">clickInPrompt</span><span class="style1"> : sent when clicking on the prompt if any (mouseDown), followed by the Listoid name and ID (the latter only with HC 2.1). This message can be trapped using a handler :</span><span class="style5">     on clickInPrompt WName,WID       if WName is "MyList"...     end clickInPrompt</span><span class="style1"></span><span class="style4">PROPERTIES</span><span class="style1">   Like any XWindow, Listoid has properties that can be get and set thru HyperTalk. </span><span class="style5">             properties of window "Infoid"</span><span class="style1">will return an item list of all allowed properties :   ‚Ä¢ loc                  : windoid's position according to card   ‚Ä¢ visible            : windoid's visibility   ‚Ä¢ text                : windoid's text   ‚Ä¢ rect                : windoid's position and size according to card   ‚Ä¢ selectedLine    : line number(s) selected   ‚Ä¢ selectionMode : selection mode (NO|ONE|CON|DIS)   ‚Ä¢ selectedText   : list of selected items (</span><span class="style2">get</span><span class="style1"> only)   ‚Ä¢ prompt            : prompt msg (can be changed only if already existing)   ‚Ä¢ messages        : list of windoid's messages</span><span class="style2">NOTE</span><span class="style1">   When using the "set text" property, the XCMD scans again the input text to find any new separator used, except if this one has been forced in the parameters of the original call.</span><span class="style4">ERRORS</span><span class="style1">If an error occurs, external can return :     "Error : Bad background color"     "Error : Missing or empty window name"     "Error : Duplicate window name"     "Error : Empty parameter"     "Error : Color defined twice"     "Error : Bad Font size"     "Error : Out of memory"     "Error : This property cannot be set"     "Error : Bad rectangle param"     "Error : Bad selection mode param"     "Error : Unknown property"     "Error : Not found"</span><span class="style4">HISTORY</span><span class="style1"></span><span class="style2">2.8</span><span class="style1"> :                                                                                      </span><span class="style2">05/21/92</span><span class="style1">‚Ä¢ Added </span><span class="style3">owner </span><span class="style1">property</span><span class="style3"></span><span class="style1"></span><span class="style2">2.7</span><span class="style1"> :                                                                                      </span><span class="style2">05/04/92</span><span class="style1">‚Ä¢ Added </span><span class="style3">clickInPrompt</span><span class="style1"> message‚Ä¢ Changed </span><span class="style3">controlKey</span><span class="style1"> handler for </span><span class="style3">keyDown</span><span class="style1"> in card script</span><span class="style2">2.6</span><span class="style1"> :                                                                                      </span><span class="style2">04/27/92</span><span class="style1">‚Ä¢ Fixed bug appearing on Macs without ColorQD</span><span class="style2">2.5</span><span class="style1"> :                                                                                      </span><span class="style2">04/18/92</span><span class="style1">‚Ä¢ Properties now return an error msg with incorrect param‚Ä¢ </span><span class="style3">ClickInListoid</span><span class="style1"> sent now only with clicks inside the list‚Ä¢ Added </span><span class="style3">messages </span><span class="style1">property‚Ä¢ ID of window now returned along with all sent messages‚Ä¢ Added "Error : Not found" when sent string is not found‚Ä¢ Added color support</span><span class="style2">2.4</span><span class="style1"> :                                                                                      </span><span class="style2">03/07/92</span><span class="style1">‚Ä¢ Handling of parameter defined separator when using "set text"</span><span class="style2">2.3</span><span class="style1"> :                                                                                      </span><span class="style2">03/06/92</span><span class="style1">‚Ä¢ Fixed default window position‚Ä¢ Check for new separator with "set text of window‚Ķ"‚Ä¢ Fixed property "set text of window‚Ķ"</span><span class="style2">2.2</span><span class="style1"> :                                                                                      </span><span class="style2">02/23/92</span><span class="style1">‚Ä¢ Fixed selectedLine property result when no current selection‚Ä¢ Fixed separator parser‚Ä¢ No more CURS resource creation‚Ä¢ Added text alignment param</span><span class="style2">2.1</span><span class="style1"> :                                                                                      </span><span class="style2">10/10/91</span><span class="style1">‚Ä¢ Fixed searching routine for multi-words strings‚Ä¢ Enhanced handling of ghost cursor‚Ä¢ Space recognized as default separator</span><span class="style2">2.0</span><span class="style1"> :                                                                                         </span><span class="style2">8/15/91</span><span class="style1">‚Ä¢ Change zoom behaviour to resize window according to screen height‚Ä¢ CURS resource created only if "DontAllowReorg" param not passed</span><span class="style2">1.9</span><span class="style1"> :                                                                                         </span><span class="style2">8/14/91</span><span class="style1">‚Ä¢ Added "DontAllowReorg" parameter‚Ä¢ Fixed CURS resource adding‚Ä¢ Double quote always replaced by single quote in the window name‚Ä¢ Added "=" online help parameter‚Ä¢ Added window ID (for HC 2.1 only) passed along with "OpenListoid" and    "CloseListoid" messages</span><span class="style2">1.8</span><span class="style1"> :                                                                                         </span><span class="style2">6/14/91</span><span class="style1">‚Ä¢ Fixed font changing with lock Screen (bug due to HC itself)‚Ä¢ Fixed cell size calculation‚Ä¢ ClicInListoid renamed clic</span><span class="style4">k</span><span class="style1">InListoid‚Ä¢ clickInListoid message now sent after selection is done‚Ä¢ Added items moving feature‚Ä¢ Added prompt in the windoid‚Ä¢ Added separator and prompt params‚Ä¢ Added prompt property</span><span class="style2">1.7</span><span class="style1"> :‚Ä¢ Fixed windoid show/hide when switching‚Ä¢ Fixed search bug with empty cells‚Ä¢ Unsuccessfull search deselects all cells‚Ä¢ Fixed CellRect when rect param passed‚Ä¢ Added clicInListoid message‚Ä¢ Added selectedText property‚Ä¢ Fixed non-floating windows activation</span><span class="style2">1.6</span><span class="style1"> :‚Ä¢ Added arrow key moving and validation</span><span class="style2">1.5</span><span class="style1"> :‚Ä¢ changed inContent cursor</span><span class="style2">1.4</span><span class="style1"> :‚Ä¢ Added window style parameter‚Ä¢ Added "openListoid" message‚Ä¢ Added searching capabilities‚Ä¢ Added quote filter for ListoidSelect message parameters‚Ä¢ Fixed rect/globalRect property to not show window if invisible‚Ä¢ Added support of Rinaldoid WDEF and CDEF</span><span class="style2">1.3</span><span class="style1"> :‚Ä¢ Added font name and size parameter</span><span class="style2">1.1</span><span class="style1"> :‚Ä¢ Window title is now displayed‚Ä¢ Added window name parameter‚Ä¢ Window name is passed along with ListoidSelect message.‚Ä¢ Added closeListoid message--------------------------------------------------------------------This (these) external(s) is (are) FreeWare,allowing unlimited use in any non-commercial stack. You just need in this case to mention the author's name and copyright in your stack.Any commercial use must be licensed and aknowledged by the author.                               ¬© F. Rinaldi - 1989‚Ķ1992</span><span class="style2">AppleLink</span><span class="style1">: RINALDI1   </span><span class="style2">CalvaCom</span><span class="style1"> : FR10    </span><span class="style2">Compuserve</span><span class="style1"> : 71170,2111</span></text>
  112.     </content>
  113.     <content>
  114.         <layer>card</layer>
  115.         <id>16</id>
  116.         <text>AboutADBLightsAux WindowBarButtonBeepSoundBreakSportChangeCursChangeMenuCheckMenuCloseResForkColorColumnizeCombineFilesCommInitCommWriteHyperSoundImportPICTInitMIDIKillResKillResIDLookupATMakeICONMakeRandomMenuChangeMenuCheckMenuInsertMenuInstallMenuMgrMenuRemoveMenuSetModDialogModResCopyMountMultiScrollMungeMCTBNewFolderOpenSPortPopUpPicturePostEventPrFieldPrintClipPrintFieldPrintFldPrintrectPrintTextProgressProgressPromptPromptPutAlertPutClipboardReceiveATRegisterATRenameFileResChngInfoResCopyResCopyTypesResDeleteResetMIDIResetPrinterResetSPortRestartSafeShutDownSaySayPhoneticScanSendATSendSerialSendSPortSetSetDeskSetDialogSetModeSetPitchSetPVolumeSetRateSetVolumeShowAlertShowCursorShowDialogShowMenuShutDownSoundCapToResSpeakSTARStatusDialogStdFileStopTabsSuspendinstallTalkTalkConvertTalkPhoneticTextStreamTitleBarTrapReturnTurnSpeechOffTurnSpeechOnTxMIDIUnmountXcleanXprintFieldZoomRect</text>
  117.     </content>
  118.     <name></name>
  119.     <script>on ListoidSelect What,Whereput Where & " : " & Whatwait 1 secend ListoidSelecton closeListoid Whichput "You closed windoid ‚Äú" & Which & "‚Äù"end closeListoidon keyDown Whatif there is a window "TheList" and the optionKey is downthenget offset(What,"√¶√ü¬©‚àÇ√™ΔíÔ¨Å√å√Æ√è√ନ¬µ~≈ìœÄ‚Ä°¬Æ√í‚Ƭ∫‚óä‚Äπ‚âà√ö√Ç")if it ‚↠0then put numToChar(it + 64) into Whatsend What to window "TheList"else pass keyDownend keyDownon clickInListoid Whichput "You clicked in windoid ‚Äú" & Which & "‚Äù"end clickInListoid</script>
  120. </card>
  121.  
  122.  
  123.